object frmCustom: TfrmCustom Left = 61 Top = 122 BorderStyle = bsDialog Caption = 'Custom Speed' ClientHeight = 188 ClientWidth = 443 Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object lblSpeed: TLabel Left = 64 Top = 119 Width = 44 Height = 16 Caption = '&Speed:' FocusControl = SpinEditSpeed end object Label1: TLabel Left = 20 Top = 29 Width = 403 Height = 80 AutoSize = False Caption = 'It takes a lot of computation power to draw one frame, for every' + ' single time interval. Therefore, the speed of the program can b' + 'e greately increased if we calculate several time intervals per ' + 'frame. This does not affect the accuracy of the simulation.' WordWrap = True end object Label2: TLabel Left = 20 Top = 8 Width = 420 Height = 21 AutoSize = False Caption = 'Speed determines how many time intervals to calculate per frame.' + ' ' end object butOK: TButton Left = 353 Top = 156 Width = 82 Height = 24 Caption = '&OK' Default = True TabOrder = 2 OnClick = butOKClick end object butCancel: TButton Left = 264 Top = 156 Width = 82 Height = 24 Cancel = True Caption = '&Cancel' TabOrder = 1 OnClick = butCancelClick end object SpinEditSpeed: TSpinEdit Left = 121 Top = 113 Width = 257 Height = 32 AutoSize = False Increment = 50 MaxLength = 11 MaxValue = 2147483000 MinValue = 1 TabOrder = 0 Value = 1 end end